home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 1
/
Cream of the Crop 1.iso
/
PROGRAM
/
MATRIX04.ARJ
/
MATTRAN.C
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-22
|
1KB
|
46 lines
/*
*-----------------------------------------------------------------------------
* file: mattran.c
* desc: matrix mathematics
* by: ko shu pui, patrick
* date: v0.1 - 24 nov 91
* revi: v0.2 - 14 may 92
* ref:
* [1] Mary L.Boas, "Mathematical Methods in the Physical Sciene,"
* John Wiley & Sons, 2nd Ed., 1983. Chap 3.
*
*-----------------------------------------------------------------------------
*/
#include <stdio.h>
#include "matrix.h"
/*
*-----------------------------------------------------------------------------
* funct: mat_tran
* desct: transpose of a matrix
* given: A = matrix A to be transposed
* retrn: allocated matrix for A^t
* comen:
*-----------------------------------------------------------------------------
*/
MATRIX mat_tran( A )
MATRIX A;
{
int i, j;
MATRIX At;
if ((At = mat_creat( MatCol(A), MatRow(A), UNDEFINED )) == NULL)
return (NULL);
/*
* Transposing ...
*/
for (i=0; i<MatCol(A); i++)
for (j=0; j<MatRow(A); j++)
{
At[i][j] = A[j][i];
}
return (At);
}